-- card: 20216 from stack: in
-- bmap block id: 21984
-- flags: 4000
-- background id: 2605
-- name: solar
----- HyperTalk script -----
on closeCard
  hide cd fld ptolemy
  hide cd fld 2
  pass closeCard
end closeCard
on idle
  if visible of cd fld ptolemy is false then hide cd fld hider
  pass idle
end idle


-- part 1 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=315 top=46 right=321 bottom=489
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 13
-- part name: DoNotPop


-- part 5 (field)
-- low flags: 81
-- high flags: 0002
-- rect: left=312 top=43 right=309 bottom=490
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 201
-- text size: 10
-- style flags: 0
-- line height: 13
-- part name: hider


-- part 3 (field)
-- low flags: 81
-- high flags: 0000
-- rect: left=314 top=47 right=312 bottom=492
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 8192
-- line height: 13
-- part name: ptolemy


-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=75 top=32 right=319 bottom=310
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: solar
----- HyperTalk script -----
on mouseUp
  cleanScreen
  set cursor to 14
  get script of target
  put cantmodify of this stack into modTemp
  set cantmodify of this stack to true
  lock screen
  show cd fld 2
  put line 30 to 47 of it into cd fld "Ptolemy"
  show cd fld "Ptolemy"
  unlock screen with dissolve
  waiter
  lock screen
  put return &line 48 to 63 of it into cd fld "Ptolemy"
  unlock screen with dissolve
  waiter
  lock screen
  put return &return &line 64 to 80 of it into cd fld "Ptolemy"
  show cd fld "Ptolemy"
  unlock screen with dissolve
  waiter
  lock screen
  hide cd fld 2
  hide cd fld "Ptolemy"
  put empty into cd fld "Ptolemy"
  unlock screen with dissolve
  set cantmodify of this stack to modTemp
end mouseUp

The planets appear to be
retracing their steps or "doing
donuts" in the sky as they race
around the earth.  This is
because the earth is actually
traveling around the sun in the
same direction and at nearly
the same plane, but at a higher
orbital speed than these outer
planets.  It  periodically
catches up to and overtakes
these planets, like a faster car
overtakes a slower car on a
race track.   As the faster car
passes a slower car, the slower
car appears to drift backward
in relation to the background.
(continued)
In the case of the Solar System,
the background is the stars and
as we carefully observe the
planets they appear to
periodically reverse their
position and circle backwards
every time we pass them. If we
assume these planets are
orbiting us, they must be
"doing donuts" in the sky.
In 140 A. D. when the Greek
astronomer, Claudius Ptolemy,
developed this earth centered
model of the universe the
"donuts" were called "epicycles".
(continued)
The Copernican system,
based on the notion that the sun
was the center of the universe,
began to replace Ptolemy's
system in the year 1530.
Copernicus didn't disprove the
observable behavior, the facts
of astronomy; he  provided a
totally different way of looking
at them based on an idea we now
consider false.
(The sun is not the center of the
universe and the planets do not
have circular orbits.)

(That's it)


-- part contents for card part 1
----- text -----
Diagrams like this  charted the facts of astronomy for 1300 years.

The convoluted diagrams you'd need to chart all human activity—from questioning the meaning of life, to the work of Mother Teresa—on the basis of motivations predicted in evolution might make the diagram on the left look simple. If our commercial civilization had any need for the "inner man" it would demand a new perspective on the facts of evolution. 


-- part contents for card part 5
----- text -----